object FConsultaItensNfMae: TFConsultaItensNfMae
  Left = 317
  Top = 264
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  AutoScroll = False
  Caption = 'Consulta Itens da DI/NF M'#227'e  (Clique duas vezes para Selecionar)'
  ClientHeight = 247
  ClientWidth = 657
  Color = clBtnFace
  Constraints.MaxHeight = 281
  Constraints.MaxWidth = 665
  Constraints.MinHeight = 281
  Constraints.MinWidth = 665
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 0
    Top = 23
    Width = 657
    Height = 224
    Align = alClient
    BiDiMode = bdLeftToRight
    Color = clWhite
    Ctl3D = True
    DataSource = Ds_Itens
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
    ParentBiDiMode = False
    ParentCtl3D = False
    ParentFont = False
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = DBGrid1DblClick
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'NF_NUMERONF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Title.Caption = 'Numero'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 60
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'NF_SERIENF'
        Title.Caption = 'Serie'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NF_DATAEMISSAO'
        Title.Caption = 'Emiss'#227'o'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 68
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'ITENSNF_QUANTIDADE'
        Title.Caption = 'Quantidade'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NF_DI_NDI'
        Title.Caption = 'Numero DI'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 82
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NF_DI_DDT'
        Title.Caption = 'Data DI'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NF_DI_XLOCDESEMB'
        Title.Caption = 'Municipio'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NF_CLIENTE_DESC'
        Title.Caption = 'Exportador'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 657
    Height = 23
    Align = alTop
    Color = clActiveCaption
    TabOrder = 1
    object Label1: TLabel
      Left = 6
      Top = 3
      Width = 53
      Height = 16
      Caption = 'Produto: '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 61
      Top = 3
      Width = 402
      Height = 16
      AutoSize = False
      Caption = '(Referencia) Pneu......'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object Ds_Itens: TDataSource
    DataSet = QPesquisa
    Left = 208
    Top = 184
  end
  object QPesquisa: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT NOTAFISCALVENDA.NF_NUMERONF,'
      '       NOTAFISCALVENDA.NF_SERIENF,'
      '       NOTAFISCALVENDA.NF_DATAEMISSAO,'
      '       ITENSNOTAFISCALVENDA.ITENSNF_QUANTIDADE,'
      '       NOTAFISCALVENDA.NF_DI_NDI,'
      '       NOTAFISCALVENDA.NF_DI_DDT,'
      '       NOTAFISCALVENDA.NF_CLIENTE_DESC,'
      '       ITENSNOTAFISCALVENDA.ITENSNF_PRODUTO,'
      '       NOTAFISCALVENDA.NF_DI_XLOCDESEMB,'
      '       NOTAFISCALVENDA.NF_DI_UFDESEMB,'
      '       NOTAFISCALVENDA.NF_CLIENTE,'
      '       ITENSNFE_DI_DDESEMB, '
      '       NF_DI_DDESEMB'
      'FROM'
      'NOTAFISCALVENDA'
      
        'INNER JOIN ITENSNOTAFISCALVENDA ON (ITENSNOTAFISCALVENDA.ITENSNF' +
        '_NOTAFISCAL = NOTAFISCALVENDA.NF_CODIGO)'
      
        'INNER JOIN TIPOVENDA ON (TIPOVENDA.TIPVEND_CODIGO = NOTAFISCALVE' +
        'NDA.NF_TIPOVENDA)'
      'WHERE'
      'NOTAFISCALVENDA.NF_SITUACAO = 1 AND'
      'TIPOVENDA.TIPOVEND_NF_IMPORT = 1 AND'
      'ITENSNOTAFISCALVENDA.ITENSNF_PRODUTO = :PROD'
      'order by NF_NUMERONF desc')
    Left = 272
    Top = 184
    ParamData = <
      item
        DataType = ftString
        Name = 'PROD'
        ParamType = ptUnknown
        Value = 1728
      end>
    object QPesquisaNF_NUMERONF: TIntegerField
      FieldName = 'NF_NUMERONF'
    end
    object QPesquisaNF_SERIENF: TStringField
      FieldName = 'NF_SERIENF'
      Size = 3
    end
    object QPesquisaNF_DATAEMISSAO: TDateTimeField
      FieldName = 'NF_DATAEMISSAO'
    end
    object QPesquisaITENSNF_QUANTIDADE: TFloatField
      Alignment = taLeftJustify
      FieldName = 'ITENSNF_QUANTIDADE'
    end
    object QPesquisaNF_DI_NDI: TStringField
      FieldName = 'NF_DI_NDI'
    end
    object QPesquisaNF_DI_DDT: TDateTimeField
      FieldName = 'NF_DI_DDT'
    end
    object QPesquisaNF_CLIENTE_DESC: TStringField
      FieldName = 'NF_CLIENTE_DESC'
      Size = 80
    end
    object QPesquisaITENSNF_PRODUTO: TIntegerField
      FieldName = 'ITENSNF_PRODUTO'
    end
    object QPesquisaNF_DI_XLOCDESEMB: TStringField
      FieldName = 'NF_DI_XLOCDESEMB'
      Size = 200
    end
    object QPesquisaNF_DI_UFDESEMB: TStringField
      FieldName = 'NF_DI_UFDESEMB'
      FixedChar = True
      Size = 2
    end
    object QPesquisaNF_CLIENTE: TIntegerField
      FieldName = 'NF_CLIENTE'
    end
    object QPesquisaITENSNFE_DI_DDESEMB: TDateTimeField
      FieldName = 'ITENSNFE_DI_DDESEMB'
    end
    object QPesquisaNF_DI_DDESEMB: TDateTimeField
      FieldName = 'NF_DI_DDESEMB'
    end
  end
end
